home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / dlanhs.z / dlanhs
Text File  |  1996-03-14  |  3KB  |  133 lines
  1.  
  2.  
  3.  
  4. DDDDLLLLAAAANNNNHHHHSSSS((((3333FFFF))))                                                          DDDDLLLLAAAANNNNHHHHSSSS((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      DLANHS - return the value of the one norm, or the Frobenius norm, or the
  10.      infinity norm, or the element of largest absolute value of a Hessenberg
  11.      matrix A
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      DOUBLE PRECISION FUNCTION DLANHS( NORM, N, A, LDA, WORK )
  15.  
  16.          CHARACTER    NORM
  17.  
  18.          INTEGER      LDA, N
  19.  
  20.          DOUBLE       PRECISION A( LDA, * ), WORK( * )
  21.  
  22. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  23.      DLANHS  returns the value of the one norm,  or the Frobenius norm, or the
  24.      infinity norm,  or the  element of  largest absolute value  of a
  25.      Hessenberg matrix A.
  26.  
  27.  
  28. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  29.      DLANHS returns the value
  30.  
  31.         DLANHS = ( max(abs(A(i,j))), NORM = 'M' or 'm'
  32.                  (
  33.                  ( norm1(A),         NORM = '1', 'O' or 'o'
  34.                  (
  35.                  ( normI(A),         NORM = 'I' or 'i'
  36.                  (
  37.                  ( normF(A),         NORM = 'F', 'f', 'E' or 'e'
  38.  
  39.      where  norm1  denotes the  one norm of a matrix (maximum column sum),
  40.      normI  denotes the  infinity norm  of a matrix  (maximum row sum) and
  41.      normF  denotes the  Frobenius norm of a matrix (square root of sum of
  42.      squares).  Note that  max(abs(A(i,j)))  is not a  matrix norm.
  43.  
  44.  
  45. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  46.      NORM    (input) CHARACTER*1
  47.              Specifies the value to be returned in DLANHS as described above.
  48.  
  49.      N       (input) INTEGER
  50.              The order of the matrix A.  N >= 0.  When N = 0, DLANHS is set to
  51.              zero.
  52.  
  53.      A       (input) DOUBLE PRECISION array, dimension (LDA,N)
  54.              The n by n upper Hessenberg matrix A; the part of A below the
  55.              first sub-diagonal is not referenced.
  56.  
  57.      LDA     (input) INTEGER
  58.              The leading dimension of the array A.  LDA >= max(N,1).
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. DDDDLLLLAAAANNNNHHHHSSSS((((3333FFFF))))                                                          DDDDLLLLAAAANNNNHHHHSSSS((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      WORK    (workspace) DOUBLE PRECISION array, dimension (LWORK),
  75.              where LWORK >= N when NORM = 'I'; otherwise, WORK is not
  76.              referenced.
  77.  
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.